home *** CD-ROM | disk | FTP | other *** search
/ Oxygen Multimedia Graphics 22 / Oxygen Multimedia Graphics 22.iso / pc / System / OX22 / PDC_160_ShowFile_CT4.ls < prev    next >
Encoding:
Text File  |  2008-03-12  |  551 b   |  21 lines
  1. property templateName, template, getColor, fulltName, ShowFile
  2. global ds, goUp, gList, giNum, gtNum, gtColor
  3.  
  4. on enterFrame
  5.   templateName = "t" & gtNum
  6.   template = getAt(gList, templateName)
  7.   getColor = templateName & "c" & gtColor
  8.   tColor = getAt(gList, getColor)
  9.   fulltName = template & tColor
  10.   ShowFile = the moviePath & goUp & "Blank Template Themes" & ds & fulltName
  11. end
  12.  
  13. on mouseUp
  14.   baOpenFile(ShowFile, EMPTY)
  15.   if the platform contains "Mac" then
  16.     Ok = baActivateWindow(baFindWindow("MACS", EMPTY))
  17.   else
  18.     nothing()
  19.   end if
  20. end
  21.